home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 726-750 / 742 / rkrm_lib3 / rkrm_lib3.lha / Keymap / d.asm < prev    next >
Assembly Source File  |  1992-09-03  |  25KB  |  659 lines
  1. *
  2. * Copyright (c) 1992 Commodore-Amiga, Inc.
  3. * 
  4. * This example is provided in electronic form by Commodore-Amiga, Inc. for 
  5. * use with the "Amiga ROM Kernel Reference Manual: Devices", 3rd Edition, 
  6. * published by Addison-Wesley (ISBN 0-201-56775-X).
  7. * 
  8. * The "Amiga ROM Kernel Reference Manual: Devices" contains additional 
  9. * information on the correct usage of the techniques and operating system 
  10. * functions presented in these examples.  The source and executable code 
  11. * of these examples may only be distributed in free electronic form, via 
  12. * bulletin board or as part of a fully non-commercial and freely 
  13. * redistributable diskette.  Both the source and executable code (including 
  14. * comments) must be included, without modification, in any copy.  This 
  15. * example may not be published in printed form or distributed with any
  16. * commercial product.  However, the programming techniques and support
  17. * routines set forth in these examples may be used in the development
  18. * of original executable software products for Commodore Amiga computers.
  19. * 
  20. * All other rights reserved.
  21. * 
  22. * This example is provided "as-is" and is subject to change; no
  23. * warranties are made.  All use is at your own risk. No liability or
  24. * responsibility is assumed.
  25. *
  26. **********************************************************************
  27. *
  28. *   d.asm - d (GERMAN) A2000 key map
  29. *
  30. **********************************************************************
  31.  
  32.  
  33. **   Assemble and then link without startup code or linker libs
  34.  
  35. *------ Included Files -----------------------------------------------
  36.         INCLUDE         "exec/types.i"
  37.         INCLUDE         "devices/keymap.i"
  38. *---------------------------------------------------------------------
  39.         DC.L    0,0             ; ln_Succ, ln_Pred
  40.         DC.B    0,0             ; ln_Type, ln_Pri
  41.         DC.L    KMName          ; ln_Name
  42.         DC.L    KMLowMapType
  43.         DC.L    KMLowMap
  44.         DC.L    KMLCapsable
  45.         DC.L    KMLRepeatable
  46.         DC.L    KMHighMapType
  47.         DC.L    KMHighMap
  48.         DC.L    KMHCapsable
  49.         DC.L    KMHRepeatable
  50. *------ Key Translation Table ----------------------------------------
  51. *  Raw key codes
  52. *
  53. *  45   50  51  52  53  54   55  56  57  58  59
  54. *  00   01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 41  46  5F    5A  5B  5C  5D
  55. *  42    10 11 12 13 14 15 16 17 18 19 1A 1B   44            3D  3E  3F  4A
  56. *  63 62  20 21 22 23 24 25 26 27 28 29 2A 2B        4C      2D  2E  2F  5E
  57. *  60 30   31 32 33 34 35 36 37 38 39 3A     61   4F 4D 4E   1D  1E  1F  43
  58. *     64  66                40             67 65             0F      3C
  59. *
  60. *---------------------------------------------------------------------
  61. *  German (D) mapping
  62. *
  63. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  64. *  `~   1! 2" 3S 4$ 5% 6& 7/ 8( 9) 0= B? '` \| BS  DEL HELP  [{  ]}  /   *
  65. *  TAB   qQ wW eE rR tT zZ uU iI oO pP uU +*  RET            7   8   9   -
  66. *  CT CL  aA sS dD fF gG hH jJ kK lL oO aA #^        UC      4   5   6   +
  67. *  SH <>   yY xX cC vV bB nN mM ,; .: -_     SH   LC DC RC   1   2   3   ENT
  68. *     ALT AM              SPACE            AM ALT            0       .
  69. *
  70. *---------------------------------------------------------------------
  71. *   For comparison, here's the USA1 mapping
  72. *
  73. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  74. *  `~   1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ \| BS  DEL HELP  ((  ))  //  **
  75. *  TAB   qQ wW eE rR tT yY uU iI oO pP [{ ]}  RET            77  88  99  --
  76. *  CT CL  aA sS dD fF gG hH jJ kK lL ;: '" [2B]      UC      44  55  66  ++
  77. *  SH [30] zZ xX cC vV bB nN mM ,< .> /?     SH   LC DC RC   11  22  33 ENT
  78. *     ALT AM              SPACE            AM ALT            00      ..
  79. *
  80. *--------------------------------------------------------------------------
  81. *
  82. *       40      Space
  83. *       41      Backspace
  84. *       42      Tab
  85. *       43      Enter
  86. *       44      Return
  87. *       45      Escape
  88. *       46      Delete
  89. *       4A      Numeric Pad -
  90. *       4C      Cursor Up
  91. *       4D      Cursor Down
  92. *       4E      Cursor Forward
  93. *       4F      Cursor Backward
  94. *
  95. *       50-59   Function keys F1-F10
  96. *       5A      Numeric Pad [{  (A2000)
  97. *       5B      Numeric Pad ]}  (A2000)
  98. *       5C      Numeric Pad /   (A2000)
  99. *       5D      Numeric Pad *   (A2000)
  100. *       5E      Numeric Pad +   (A2000)
  101. *       5F      Help
  102. *
  103. *       60      Left Shift
  104. *       61      Right Shift
  105. *       62      Caps Lock
  106. *       63      Control
  107. *       64      Left Alt
  108. *       65      Right Alt
  109. *       66      Left Amiga
  110. *       67      Right Amiga
  111. *
  112. *       68      Left Mouse Button (not converted)
  113. *       69      Right Mouse Button (not converted)
  114. *       6A      Middle Mouse Button (not converted)
  115. *
  116. *---------------------------------------------------------------------
  117. KMLCapsable: ; NL means NULL (undefined) and RE means RESERVED
  118.         DC.B    %00000000       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  119.         DC.B    %00000000       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  120.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  121.         DC.B    %00000111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  122.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  123.         DC.B    %00000111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  124.         DC.B    %11111110       ; mM nN bB vV cC xX yY <>  37 - 30
  125.         DC.B    %00000000       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  126.  
  127. KMHCapsable:
  128.         DC.B    %00000000       ; 47 - 40
  129.         DC.B    %00000000       ; 4F - 48
  130.         DC.B    %00000000       ; 57 - 50
  131.         DC.B    %00000000       ; 5F - 58
  132.         DC.B    %00000000       ; 67 - 60
  133.         DC.B    %00000000       ; 6F - 68
  134.         DC.B    %00000000       ; 77 - 70
  135. KMLRepeatable:
  136.         DC.B    %11111111       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  137.         DC.B    %10111111       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  138.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  139.         DC.B    %11101111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  140.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  141.         DC.B    %11101111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  142.         DC.B    %11111111       ; mM nN bB vV cC xX yY <>  37 - 30
  143.         DC.B    %11110111       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  144. KMHRepeatable:
  145.         DC.B    %01000111       ; 47 - 40
  146.         DC.B    %11110100       ; 4F - 48
  147.         DC.B    %11111111       ; 57 - 50
  148.         DC.B    %01111111       ; 5F - 58
  149.         DC.B    %00000000       ; 67 - 60
  150.         DC.B    %00000000       ; 6F - 68
  151.         DC.B    %00000000       ; 77 - 70
  152. KMLowMapType:
  153.         DC.B    KC_VANILLA              ; []            $00
  154.         DC.B    KCF_SHIFT+KCF_ALT       ; 1!
  155.         DC.B    KCF_SHIFT+KCF_ALT       ; 2"
  156.         DC.B    KCF_SHIFT+KCF_ALT       ; 3s
  157.         DC.B    KCF_SHIFT+KCF_ALT       ; 4$
  158.         DC.B    KCF_SHIFT+KCF_ALT       ; 5%
  159.         DC.B    KC_VANILLA              ; 6&
  160.         DC.B    KCF_SHIFT+KCF_ALT       ; 7/
  161.         DC.B    KCF_SHIFT+KCF_ALT       ; 8(            $08
  162.         DC.B    KCF_SHIFT+KCF_ALT       ; 9)
  163.         DC.B    KCF_SHIFT+KCF_ALT       ; 0=
  164.         DC.B    KC_VANILLA              ; B?
  165.         DC.B    KCF_DEAD+KCF_SHIFT+KCF_ALT ; '`
  166.         DC.B    KC_VANILLA              ; \|
  167.         DC.B    KCF_NOP                 ;NL
  168.         DC.B    KC_NOQUAL               ; 0N
  169.         DC.B    KC_VANILLA              ; qQ            $10
  170.         DC.B    KC_VANILLA              ; wW
  171.         DC.B    KCF_DEAD+KC_VANILLA     ; eE
  172.         DC.B    KC_VANILLA              ; rR
  173.         DC.B    KC_VANILLA              ; tT
  174.         DC.B    KC_VANILLA              ; zZ
  175.         DC.B    KCF_DEAD+KC_VANILLA     ; uU
  176.         DC.B    KCF_DEAD+KC_VANILLA     ; iI
  177.         DC.B    KCF_DEAD+KC_VANILLA     ; oO            $18
  178.         DC.B    KC_VANILLA              ; pP
  179.         DC.B    KC_VANILLA              ; omlatuU
  180.         DC.B    KC_VANILLA              ; +*
  181.         DC.B    KCF_NOP                 ; NL
  182.         DC.B    KC_NOQUAL               ; 1N
  183.         DC.B    KC_NOQUAL               ; 2N
  184.         DC.B    KC_NOQUAL               ; 3N
  185.         DC.B    KCF_DEAD+KC_VANILLA     ; aA            $20
  186.         DC.B    KC_VANILLA              ; sS
  187.         DC.B    KC_VANILLA              ; dD
  188.         DC.B    KCF_DEAD+KC_VANILLA     ; fF
  189.         DC.B    KCF_DEAD+KC_VANILLA     ; gG
  190.         DC.B    KCF_DEAD+KC_VANILLA     ; hH
  191.         DC.B    KCF_DEAD+KC_VANILLA     ; jJ
  192.         DC.B    KCF_DEAD+KC_VANILLA     ; kK
  193.         DC.B    KC_VANILLA              ; lL            $28
  194.         DC.B    KCF_SHIFT+KCF_ALT       ; umlotoO
  195.         DC.B    KCF_SHIFT+KCF_ALT       ; umlotaA
  196.         DC.B    KC_VANILLA              ; #^
  197.         DC.B    KCF_NOP                 ; NL
  198.         DC.B    KC_NOQUAL               ; 4N
  199.         DC.B    KC_NOQUAL               ; 5N
  200.         DC.B    KC_NOQUAL               ; 6N
  201.         DC.B    KCF_SHIFT               ; <>            $30
  202.         DC.B    KCF_DEAD+KC_VANILLA     ; yY
  203.         DC.B    KC_VANILLA              ; xX
  204.         DC.B    KC_VANILLA              ; cC
  205.         DC.B    KC_VANILLA              ; vV
  206.         DC.B    KC_VANILLA              ; bB
  207.         DC.B    KCF_DEAD+KC_VANILLA     ; nN
  208.         DC.B    KC_VANILLA              ; mM
  209.         DC.B    KCF_SHIFT+KCF_ALT       ; ,;            $38
  210.         DC.B    KCF_SHIFT+KCF_ALT       ; .:
  211.         DC.B    KC_VANILLA              ; -_
  212.         DC.B    KCF_NOP                 ; NL
  213.         DC.B    KC_NOQUAL               ; .N
  214.         DC.B    KC_NOQUAL               ; 7N
  215.         DC.B    KC_NOQUAL               ; 8N
  216.         DC.B    KC_NOQUAL               ; 9N
  217. KMHighMapType:
  218.         DC.B    KCF_DEAD+KCF_ALT        ; SPACE         $40
  219.         DC.B    KC_NOQUAL               ; BACKSPACE
  220.         DC.B    KCF_STRING+KCF_SHIFT    ; TAB
  221.         DC.B    KC_NOQUAL               ; ENTER
  222.         DC.B    KCF_CONTROL             ; RETURN
  223.         DC.B    KCF_ALT                 ; ESCAPE
  224.         DC.B    KC_NOQUAL               ; DELETE
  225.         DC.B    KCF_NOP
  226.         DC.B    KCF_NOP                 ;               $48
  227.         DC.B    KCF_NOP
  228.         DC.B    KC_NOQUAL               ; Numeric Pad -
  229.         DC.B    KCF_NOP
  230.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR UP
  231.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR DOWN
  232.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR FORWARD
  233.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR BACKWARD
  234.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 1        $50
  235.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 2
  236.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 3
  237.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 4
  238.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 5
  239.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 6
  240.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 7
  241.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 8
  242.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 9        $58
  243.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 10
  244.         DC.B    KCF_SHIFT+KCF_CONTROL   ; Numeric Pad [{
  245.         DC.B    KCF_SHIFT+KCF_CONTROL   ; Numeric Pad ]}
  246.         DC.B    KC_NOQUAL               ; Numeric Pad /
  247.         DC.B    KC_NOQUAL               ; Numeric Pad *
  248.         DC.B    KC_NOQUAL               ; Numeric Pad +
  249.         DC.B    KCF_STRING              ; Help
  250.         DC.B    KCF_NOP                 ; Left Shift    $60
  251.         DC.B    KCF_NOP                 ; Right Shift
  252.         DC.B    KCF_NOP                 ; Caps Lock
  253.         DC.B    KCF_NOP                 ; Control
  254.         DC.B    KCF_NOP                 ; Left Alt
  255.         DC.B    KCF_NOP                 ; Right Alt
  256.         DC.B    KCF_NOP                 ; Left Amiga
  257.         DC.B    KCF_NOP                 ; Right Amiga
  258.         DC.B    KCF_NOP                 ; Left Mouse Button $68
  259.         DC.B    KCF_NOP                 ; Right Mouse Button
  260.         DC.B    KCF_NOP                 ; Middle Mouse Button
  261.         DC.B    KCF_NOP
  262.         DC.B    KCF_NOP
  263.         DC.B    KCF_NOP
  264.         DC.B    KCF_NOP
  265.         DC.B    KCF_NOP
  266.         DC.B    KCF_NOP                 ; $70
  267.         DC.B    KCF_NOP
  268.         DC.B    KCF_NOP
  269.         DC.B    KCF_NOP
  270.         DC.B    KCF_NOP
  271.         DC.B    KCF_NOP
  272.         DC.B    KCF_NOP
  273.         DC.B    KCF_NOP
  274. KMLowMap:
  275.         DC.B    '~','`','~','`' ; `, ~, `, ~                            $00
  276.         DC.B    '!',$B9,'!','1' ; 1, !, super 1, !
  277.         DC.B    $B2,'@','"','2' ; 2, ", @, super 2
  278.         DC.B    '#',$B3,$A7,'3' ; 3, section, super 3, #
  279.         DC.B    $A2,$B0,'$','4' ; 4, $, degree, cents
  280.         DC.B    '%',$BC,'%','5' ; 5, %, 1/4, %
  281.         DC.B    '^',$BD,'&','6' ; 6, &, 1/2, ^
  282.         DC.B    '&',$BE,'/','7' ; 7, /, 3/4, &
  283.         DC.B    '*',$B7,'(','8' ; 8, (, bullet, *                       $08
  284.         DC.B    '(',$AB,')','9' ; 9, ), <<, (
  285.         DC.B    ')',$BB,'=','0' ; 0, =, >>, )
  286.         DC.B    '_','-','?',$DF ; sharp s, ?, -, _
  287.         DC.L    key0C           ; dead ', dead `, =, +
  288.         DC.B    '|','\','|','\' ; \, |, \, |
  289.         DC.L    0               ; NOP
  290.         DC.B    0,0,0,'0'       ; numeric pad 0 (0N)
  291.         DC.B    $C5,$E5,'Q','q' ; q, Q, dot a, dot A                    $10
  292.         DC.B    $B0,$B0,'W','w' ; w, W, dot, dot
  293.         DC.L    key12   ; e, E, (c), (c)
  294.         DC.B    $AE,$AE,'R','r' ; r, R, (r), (r)
  295.         DC.B    $DE,$FE,'T','t' ; t, T, thorn, THORN
  296.         DC.B    $A5,$A4,'Z','z' ; z, Z, IMS, Yen
  297.         DC.L    key16           ; u, U, micro, micro
  298.         DC.L    key17           ; i, I, inverted !, broken |
  299.         DC.L    key18           ; o, O, slash o, slash O                $18
  300.         DC.B    $B6,$B6,'P','p' ; p, P, paragraph, paragraph
  301.         DC.B    '{','[',$DC,$FC ; umlaut u, umlaut U, [, {
  302.         DC.B    '}',']','*','+' ; +, *, ], }
  303.         DC.L    0               ; NOP
  304.         DC.B    0,0,0,'1'       ; numeric pad 1 (1N)
  305.         DC.B    0,0,0,'2'       ; numeric pad 2 (2N)
  306.         DC.B    0,0,0,'3'       ; numeric pad 3 (3N)
  307.         DC.L    key20           ; a, A, ae, AE                          $20
  308.         DC.B    $A7,$DF,'S','s' ; s, S, sharp s, section
  309.         DC.B    $D0,$F0,'D','d' ; d, D, bar d, bar D
  310.         DC.L    key23           ; f, F, dead '
  311.         DC.L    key24           ; g, G, dead `
  312.         DC.L    key25           ; h, H, dead ^
  313.         DC.L    key26           ; j, J, dead ~
  314.         DC.L    key27           ; k, K, dead "
  315.         DC.B    $A3,$A3,'L','l' ; l, L, pound, pound                    $28
  316.         DC.B    ':',';',$D6,$F6 ; umlaut o, umlaut O, ;, :
  317.         DC.B    '"',$27,$C4,$E4 ; umlaut a, umlaut A, ', "
  318.         DC.B    '^','#','^','#' ; #, ^, #, ^
  319.         DC.L    0               ; NOP
  320.         DC.B    0,0,0,'4'       ; numeric pad 4 (4N)
  321.         DC.B    0,0,0,'5'       ; numeric pad 5 (5N)
  322.         DC.B    0,0,0,'6'       ; numeric pad 6 (6N)
  323.         DC.B    0,0,'>','<'     ; <, >                                  $30
  324.         DC.L    key31           ; y, Y, +/-, not
  325.         DC.B    $F7,$D7,'X','x' ; x, X, times, divide
  326.         DC.B    $C7,$E7,'C','c' ; c, C, c cedilla, C cedilla
  327.         DC.B    $AA,$AA,'V','v' ; v, V, female ordinal
  328.         DC.B    $BA,$BA,'B','b' ; b, B, male ordinal
  329.         DC.L    key36           ; n, N, SHY, overbar
  330.         DC.B    $BF,$B8,'M','m' ; m, M, cedilla, inverted ?
  331.         DC.B    '<',',',';',',' ; ,, ;, ,, <                            $38
  332.         DC.B    '>','.',':','.' ; ., :, ., >
  333.         DC.B    '?','/','_','-' ; -, _, /, ?
  334.         DC.L    0               ; NOP
  335.         DC.B    0,0,0,'.'       ; numeric pad . (.N)
  336.         DC.B    0,0,0,'7'       ; numeric pad 7 (7N)
  337.         DC.B    0,0,0,'8'       ; numeric pad 8 (8N)
  338.         DC.B    0,0,0,'9'       ; numeric pad 9 (9N)
  339. KMHighMap:
  340.         DC.L    key40                                                   $40
  341.         DC.B    0,0,0,$08
  342.         DC.L    key42
  343.         DC.B    0,0,0,$0D
  344.         DC.B    0,0,$0A,$0D
  345.         DC.B    0,0,$9B,$1B
  346.         DC.B    0,0,0,$7F
  347.         DC.L    0
  348.         DC.L    0                                                       $48
  349.         DC.L    0
  350.         DC.B    0,0,0,'-'
  351.         DC.L    0
  352.         DC.L    key4C
  353.         DC.L    key4D
  354.         DC.L    key4E
  355.         DC.L    key4F
  356.         DC.L    key50                                                   $50
  357.         DC.L    key51
  358.         DC.L    key52
  359.         DC.L    key53
  360.         DC.L    key54
  361.         DC.L    key55
  362.         DC.L    key56
  363.         DC.L    key57
  364.         DC.L    key58                                                   $58
  365.         DC.L    key59
  366.         DC.B    $1B,$1B,'{','[' ; numeric pad [, {
  367.         DC.B    $1D,$1D,'}',']' ; numeric pad ], }
  368.         DC.B    0,0,0,'/'       ; numeric pad /
  369.         DC.B    0,0,0,'*'       ; numeric pad *
  370.         DC.B    0,0,0,'+'       ; numeric pad +
  371.         DC.L    key5F
  372.         DC.L    0                                                       $60
  373.         DC.L    0
  374.         DC.L    0
  375.         DC.L    0
  376.         DC.L    0
  377.         DC.L    0
  378.         DC.L    0
  379.         DC.L    0
  380.         DC.L    0                                                       $68
  381.         DC.L    0
  382.         DC.L    0
  383.         DC.L    0
  384.         DC.L    0
  385.         DC.L    0
  386.         DC.L    0
  387.         DC.L    0
  388.         DC.L    0                                                       $70
  389.         DC.L    0
  390.         DC.L    0
  391.         DC.L    0
  392.         DC.L    0
  393.         DC.L    0
  394.         DC.L    0
  395.         DC.L    0
  396. ;------ possible dead keys
  397. key0C:
  398.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  399.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  400.         DC.B    0,'=',0,'+'                     ; =, +
  401. key23:
  402.         DC.B    0,'f',0,'F'                     ; f, F
  403.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  404.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  405.         DC.B    0,$06,0,$06,0,$86,0,$86         ; control translation
  406. key24:
  407.         DC.B    0,'g',0,'G'                     ; g, G
  408.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  409.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  410.         DC.B    0,$07,0,$07,0,$87,0,$87         ; control translation
  411. key25:
  412.         DC.B    0,'h',0,'H'                     ; h, H
  413.         DC.B    DPF_DEAD,3,DPF_DEAD,3           ; dead ^, dead ^
  414.         DC.B    0,$08,0,$08,0,$88,0,$88         ; control translation
  415. key26:
  416.         DC.B    0,'j',0,'J'                     ; j, J
  417.         DC.B    DPF_DEAD,4,DPF_DEAD,4           ; dead ~, dead ~
  418.         DC.B    0,$0A,0,$0A,0,$8A,0,$8A         ; control translation
  419. key27:
  420.         DC.B    0,'k',0,'K'                     ; k, K
  421.         DC.B    DPF_DEAD,5,DPF_DEAD,5           ; dead ", dead "
  422.         DC.B    0,$0B,0,$0B,0,$8B,0,$8B         ; control translation
  423. ;------ deadable keys (modified by dead keys)
  424. key12:                  ; e, E, (c), (c)
  425.         DC.B    DPF_MOD,key12u-key12,DPF_MOD,key12s-key12
  426.         DC.B    0,$A9,0,$A9
  427.         DC.B    0,$05,0,$05,0,$85,0,$85 ; control translation
  428. key12u:
  429.         DC.B    'e',$E9,$E8,$EA,'e',$EB
  430.         DC.B    $E9,$E9,$EA,$E9,$E9,$E9
  431.         DC.B    $E8,$EA,$E8,$E8,$E8,$E8
  432. key12s:
  433.         DC.B    'E',$C9,$C8,$CA,'E',$CB
  434.         DC.B    $C9,$C9,$CA,$C9,$C9,$C9
  435.         DC.B    $C8,$CA,$C8,$C8,$C8,$C8
  436. key16:                  ; u, U, micro, micro
  437.         DC.B    DPF_MOD,key16u-key16,DPF_MOD,key16s-key16
  438.         DC.B    0,$B5,0,$B5
  439.         DC.B    0,$15,0,$15,0,$95,0,$95 ; control translation
  440. key16u:
  441.         DC.B    'u',$FA,$F9,$FB,'u',$FC
  442.         DC.B    $FA,$FA,$FB,$FA,$FA,$FA
  443.         DC.B    $F9,$FB,$F9,$F9,$F9,$F9
  444. key16s:
  445.         DC.B    'U',$DA,$D9,$DB,'U',$DC
  446.         DC.B    $DA,$DA,$DB,$DA,$DA,$DA
  447.         DC.B    $D9,$DB,$D9,$D9,$D9,$D9
  448. key17:                  ; i, I, inverted !, broken |
  449.         DC.B    DPF_MOD,key17u-key17,DPF_MOD,key17s-key17
  450.         DC.B    0,$A1,0,$A6
  451.         DC.B    0,$09,0,$09,0,$89,0,$89 ; control translation
  452. key17u:
  453.         DC.B    'i',$ED,$EC,$EE,'i',$EF
  454.         DC.B    $ED,$ED,$EE,$ED,$ED,$ED
  455.         DC.B    $EC,$EE,$EC,$EC,$EC,$EC
  456. key17s:
  457.         DC.B    'I',$CD,$CC,$CE,'I',$CF
  458.         DC.B    $CD,$CD,$CE,$CD,$CD,$CD
  459.         DC.B    $CC,$CE,$CC,$CC,$CC,$CC
  460. key18:                  ; o, O, bar o, bar O
  461.         DC.B    DPF_MOD,key18u-key18,DPF_MOD,key18s-key18
  462.         DC.B    0,$F8,0,$D8
  463.         DC.B    0,$0F,0,$0F,0,$8F,0,$8F ; control translation
  464. key18u:
  465.         DC.B    'o',$F3,$F2,$F4,$F5,$F6
  466.         DC.B    $F3,$F3,$F4,$F3,$F3,$F3
  467.         DC.B    $F2,$F4,$F2,$F2,$F2,$F2
  468. key18s:
  469.         DC.B    'O',$D3,$D2,$D4,$D5,$D6
  470.         DC.B    $D3,$D3,$D4,$D3,$D3,$D3
  471.         DC.B    $D2,$D4,$D2,$D2,$D2,$D2
  472. key20:                  ; a, A, ae, AE
  473.         DC.B    DPF_MOD,key20u-key20,DPF_MOD,key20s-key20
  474.         DC.B    0,$E6,0,$C6
  475.         DC.B    0,$01,0,$01,0,$81,0,$81 ; control translation
  476. key20u:
  477.         DC.B    'a',$E1,$E0,$E2,$E3,$E4
  478.         DC.B    $E1,$E1,$E2,$E1,$E1,$E1 ; most recent is '
  479.         DC.B    $E0,$E2,$E0,$E0,$E0,$E0 ; most recent is `
  480. key20s:
  481.         DC.B    'A',$C1,$C0,$C2,$C3,$C4
  482.         DC.B    $C1,$C1,$C2,$C1,$C1,$C1 ; most recent is '
  483.         DC.B    $C0,$C2,$C0,$C0,$C0,$C0 ; most recent is `
  484. key36:                  ; n, N, SHY, overbar
  485.         DC.B    DPF_MOD,key36u-key36,DPF_MOD,key36s-key36
  486.         DC.B    0,$AD,0,$AF
  487.         DC.B    0,$0E,0,$0E,0,$8E,0,$8E ; control translation
  488. key36u:
  489.         DC.B    'n','n','n','n',$F1,'n'
  490.         DC.B    'n','n','n','n','n','n'
  491.         DC.B    'n','n','n','n','n','n'
  492. key36s:
  493.         DC.B    'N','N','N','N',$D1,'N'
  494.         DC.B    'N','N','N','N','N','N'
  495.         DC.B    'N','N','N','N','N','N'
  496. key31:                  ; y, Y, +/-, not
  497.         DC.B    DPF_MOD,key31u-key31,DPF_MOD,key31s-key31
  498.         DC.B    0,$B1,0,$AC
  499.         DC.B    0,$19,0,$19,0,$99,0,$99 ; control translation
  500. key31u:
  501.         DC.B    'y',$FD,'y','y','y',$FF
  502.         DC.B    $FD,$FD,$FD,$FD,$FD,$FD
  503.         DC.B    'y','y','y','y','y','y'
  504. key31s:
  505.         DC.B    'Y',$DD,'Y','Y','Y','Y'
  506.         DC.B    $DD,$DD,$DD,$DD,$DD,$DD
  507.         DC.B    'Y','Y','Y','Y','Y','Y'
  508. key40:                  ; space,,NBSP, and accents
  509.         DC.B    DPF_MOD,key40d-key40,0,$A0
  510. key40d:
  511.         DC.B    ' ',$B4,'`','^','~',$A8
  512.         DC.B    $B4,'^',$B4,$B4,$B4,$B4
  513.         DC.B    '`','`','^','`','`','`'
  514. ;------ string keys
  515. key42:
  516.         DC.B    key42ue-key42us,key42us-key42
  517.         DC.B    key42se-key42ss,key42ss-key42
  518. key42us:
  519.         DC.B    $09
  520. key42ue:
  521. key42ss:
  522.         DC.B    $9B,'Z'
  523. key42se:
  524. key4C:
  525.         DC.B    key4Cue-key4Cus,key4Cus-key4C
  526.         DC.B    key4Cse-key4Css,key4Css-key4C
  527. key4Cus:
  528.         DC.B    $9B,'A'
  529. key4Cue:
  530. key4Css:
  531.         DC.B    $9B,'T'
  532. key4Cse:
  533. key4D:
  534.         DC.B    key4Due-key4Dus,key4Dus-key4D
  535.         DC.B    key4Dse-key4Dss,key4Dss-key4D
  536. key4Dus:
  537.         DC.B    $9B,'B'
  538. key4Due:
  539. key4Dss:
  540.         DC.B    $9B,'S'
  541. key4Dse:
  542. key4E:
  543.         DC.B    key4Eue-key4Eus,key4Eus-key4E
  544.         DC.B    key4Ese-key4Ess,key4Ess-key4E
  545. key4Eus:
  546.         DC.B    $9B,'C'
  547. key4Eue:
  548. key4Ess:
  549.         DC.B    $9B,' ','@'
  550. key4Ese:
  551. key4F:
  552.         DC.B    key4Fue-key4Fus,key4Fus-key4F
  553.         DC.B    key4Fse-key4Fss,key4Fss-key4F
  554. key4Fus:
  555.         DC.B    $9B,'D'
  556. key4Fue:
  557. key4Fss:
  558.         DC.B    $9B,' ','A'
  559. key4Fse:
  560. key50:
  561.         DC.B    key50ue-key50us,key50us-key50
  562.         DC.B    key50se-key50ss,key50ss-key50
  563. key50us:
  564.         DC.B    $9B,'0~'
  565. key50ue:
  566. key50ss:
  567.         DC.B    $9B,'10~'
  568. key50se:
  569. key51:
  570.         DC.B    key51ue-key51us,key51us-key51
  571.         DC.B    key51se-key51ss,key51ss-key51
  572. key51us:
  573.         DC.B    $9B,'1~'
  574. key51ue:
  575. key51ss:
  576.         DC.B    $9B,'11~'
  577. key51se:
  578. key52:
  579.         DC.B    key52ue-key52us,key52us-key52
  580.         DC.B    key52se-key52ss,key52ss-key52
  581. key52us:
  582.         DC.B    $9B,'2~'
  583. key52ue:
  584. key52ss:
  585.         DC.B    $9B,'12~'
  586. key52se:
  587. key53:
  588.         DC.B    key53ue-key53us,key53us-key53
  589.         DC.B    key53se-key53ss,key53ss-key53
  590. key53us:
  591.         DC.B    $9B,'3~'
  592. key53ue:
  593. key53ss:
  594.         DC.B    $9B,'13~'
  595. key53se:
  596. key54:
  597.         DC.B    key54ue-key54us,key54us-key54
  598.         DC.B    key54se-key54ss,key54ss-key54
  599. key54us:
  600.         DC.B    $9B,'4~'
  601. key54ue:
  602. key54ss:
  603.         DC.B    $9B,'14~'
  604. key54se:
  605. key55:
  606.         DC.B    key55ue-key55us,key55us-key55
  607.         DC.B    key55se-key55ss,key55ss-key55
  608. key55us:
  609.         DC.B    $9B,'5~'
  610. key55ue:
  611. key55ss:
  612.         DC.B    $9B,'15~'
  613. key55se:
  614. key56:
  615.         DC.B    key56ue-key56us,key56us-key56
  616.         DC.B    key56se-key56ss,key56ss-key56
  617. key56us:
  618.         DC.B    $9B,'6~'
  619. key56ue:
  620. key56ss:
  621.         DC.B    $9B,'16~'
  622. key56se:
  623. key57:
  624.         DC.B    key57ue-key57us,key57us-key57
  625.         DC.B    key57se-key57ss,key57ss-key57
  626. key57us:
  627.         DC.B    $9B,'7~'
  628. key57ue:
  629. key57ss:
  630.         DC.B    $9B,'17~'
  631. key57se:
  632. key58:
  633.         DC.B    key58ue-key58us,key58us-key58
  634.         DC.B    key58se-key58ss,key58ss-key58
  635. key58us:
  636.         DC.B    $9B,'8~'
  637. key58ue:
  638. key58ss:
  639.         DC.B    $9B,'18~'
  640. key58se:
  641. key59:
  642.         DC.B    key59ue-key59us,key59us-key59
  643.         DC.B    key59se-key59ss,key59ss-key59
  644. key59us:
  645.         DC.B    $9B,'9~'
  646. key59ue:
  647. key59ss:
  648.         DC.B    $9B,'19~'
  649. key59se:
  650. key5F:
  651.         DC.B    key5Fe-key5Fs,key5Fs-key5F
  652. key5Fs:
  653.         DC.B    $9B,'?~'
  654. key5Fe:
  655. KMName:
  656.         DC.B    'd',0
  657. kmEnd
  658.         END
  659.